home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / color.dxr / 00058.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  637 b   |  24 lines
  1. on exitFrame me
  2.   global X, Y, z
  3.   hideit(6, 7)
  4.   X = random(256) - 1
  5.   Y = random(256) - 1
  6.   z = random(256) - 1
  7.   sprite(31).color = rgb(X, Y, z)
  8.   sprite(71).color = rgb(X, Y, z)
  9.   set the locV of sprite 39 to (-1 * X / 1.25600000000000001) + 280
  10.   set the locV of sprite 40 to (-1 * Y / 1.25600000000000001) + 280
  11.   set the locV of sprite 41 to (-1 * z / 1.25600000000000001) + 280
  12.   repeat with j = 36 to 38
  13.     set the constraint of sprite j to j - 3
  14.   end repeat
  15.   set the floatPrecision to 0
  16.   showit(185, 187)
  17.   hideit(188, 190)
  18.   showit(191, 191)
  19.   hideit(192, 197)
  20.   showit(198, 200)
  21.   hideit(201, 202)
  22.   showit(203, 203)
  23. end
  24.